home *** CD-ROM | disk | FTP | other *** search
/ Maximum CD 2001 May / maximum-cd-2001-05.iso / Blade of Darkness / data1.cab / Program_Executable_Files / Maps / Ragnar_M2 / cascada.py < prev    next >
Encoding:
Text File  |  2000-11-16  |  685 b   |  35 lines

  1. import Bladex
  2. import math
  3.  
  4. Bladex.AddParticleGType("AguaC","WaterParticle",1,60)
  5.  
  6. for i in range(60):
  7.     r=90
  8.     g=90
  9.     b=90
  10.     a=100
  11.     size=220.0
  12.     Bladex.SetParticleGVal("AguaC",i,r,g,b,a,size)
  13.  
  14. Bladex.AddParticleGType("Espuma","SmokeParticle",1,10)
  15.  
  16. for i in range(10):
  17.     if i>7:
  18.         traux=(10.0-i)/3.0
  19.     else:
  20.         traux=1.0
  21.     aux=(10.0-i)/10.0
  22.     r=120
  23.     g=120
  24.     b=120
  25.     #a=255*math.sqrt(1.0-aux)
  26.     a=150*traux
  27.     size=400+400.0*math.sqrt(1.0-aux)
  28.     Bladex.SetParticleGVal("Espuma",i,r,g,b,a,size)
  29.  
  30.  
  31. #char.Position = -45250, 2000,-30000
  32.  
  33. ###primera cascada  del rio
  34. CreateCascada2("Cascada1",(-80000,9000,62000),(1250.0, 0.0, 0.0),(0.0, 0.0, 1.0),(-80000,15800,62000),33)
  35.